package main

import (
	"bytes"
	"code.google.com/p/go.text/encoding/simplifiedchinese"
	"code.google.com/p/go.text/transform"
	"flag"
	"fmt"
	goq "github.com/PuerkitoBio/goquery"
	"io/ioutil"
	"net"
	"net/http"
	"os"
	"strings"
	"sync"
	"time"
)

var (
	main_domain      = "" //主域名
	waitgroup        = &sync.WaitGroup{}
	LOG              = "58"
	global_agentlist = make(map[string]bool) //有哪些经纪人已经抓过
	mutex            = &sync.Mutex{}
)

func main() {
	var citycode = flag.String("citycode", "bj", "请输入城市编号") //城市编号
	flag.Parse()

	main_domain = "http://" + *citycode + ".58.com"
	LOG = *citycode + "." + LOG

	tmpurl := fmt.Sprintf("%s/ershoufang/", main_domain)
	doc, e := getDoc(tmpurl)
	if e != nil {
		fmt.Println(e.Error())
		os.Exit(-1)
	}

	//获取区域列表
	doc.Find("#region").Find("dd").First().Children().Not("dl").Not(".select").Each(func(i int, sec *goq.Selection) {
		var (
			link     string
			district string
		)

		if tmplink, ok := sec.Attr("href"); ok {
			link = tmplink
		}

		district = filterStr(sec.Text())

		if link != "" && district != "" {
			getBlock(link, district)
		}
	})
	fmt.Println("done.")
}

//获取热点
func getBlock(url, district string) {
	tmpurl := fmt.Sprintf("%s%s", main_domain, url)
	doc, e := getDoc(tmpurl)
	if e != nil {
		fmt.Println(e.Error())
		os.Exit(-1)
	}

	//获取热点列表
	doc.Find(".subarea").Find("a").Each(func(i int, sec *goq.Selection) {
		var (
			link  string
			block string
		)

		if tmplink, ok := sec.Attr("href"); ok {
			link = tmplink
		}

		block = filterStr(sec.Text())

		if link != "" && block != "" {
			getAgentlist(link, district, block)
		}
	})
}

//获取经纪人列表
func getAgentlist(url, district, block string) {
	for curpage := 1; curpage <= 20; curpage += 5 {
		for j := curpage; j < curpage+5 && j <= curpage; j++ {
			tmpurl := fmt.Sprintf("%s%spn%d", main_domain, url, j)
			waitgroup.Add(1)
			go func(tmpurl string) {
				defer waitgroup.Done()
				doc, e := getDoc(tmpurl)
				if e != nil {
					fmt.Println(e.Error())
					return
				}
				doc.Find(".tbimg").Find("tr").Each(func(i int, sec *goq.Selection) {
					if sec.Find(".qj-listjjr").Find("a").Size() == 3 {
						name := sec.Find(".qj-listjjr").Find("a").Eq(0).Text()
						name = strings.Replace(name, "：", "", 1)
						companyname := sec.Find(".qj-listjjr").Find("a").Eq(1).Text()
						shopname := sec.Find(".qj-listjjr").Find("a").Eq(2).Text()

						str := district + "||" + block + "||" + name + "||" + companyname + "||" + shopname
						if !hasFetchAgent(str) {
							outlog(str)
						}
					}
				})
			}(tmpurl)
		}
		waitgroup.Wait()
		time.Sleep(time.Second * 10)
	}
}

//设置已经抓取过的经纪人
func hasFetchAgent(str string) bool {
	mutex.Lock()
	defer mutex.Unlock()
	if global_agentlist[str] {
		return true
	} else {
		global_agentlist[str] = true
	}
	return false
}

//获取doc
func getDoc(url string) (*goq.Document, error) {
	res, e := getResp(url)
	if e != nil {
		return nil, e
	}
	doc, e := goq.NewDocumentFromResponse(res)
	if e != nil {
		return nil, e
	}
	return doc, nil
}

//获取response
func getResp(url string) (*http.Response, error) {
	req, e := http.NewRequest("GET", url, nil)
	req.Header.Add("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8")
	//req.Header.Add("Accept-Encoding", "gzip,deflate,sdch")
	req.Header.Add("Accept-Language", "zh-CN,zh;q=0.8")
	req.Header.Add("Cache-Control", "max-age=0")
	req.Header.Add("Proxy-Connection", "keep-alive")
	req.Header.Add("User-Agent", "Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/31.0.1650.63 Safari/537.36")
	c := &http.Client{
		Transport: &http.Transport{
			Dial: func(netw, addr string) (net.Conn, error) {
				deadline := time.Now().Add(25 * time.Second)
				c, err := net.DialTimeout(netw, addr, time.Second*20)
				if err != nil {
					return nil, err
				}
				c.SetDeadline(deadline)
				return c, nil
			},
		},
	}

	var resp *http.Response
	//尝试三次
	for retry := 0; retry < 3; retry++ {
		resp, e = c.Do(req)
		if e != nil {
			time.Sleep(time.Second * 1)
		} else {
			break
		}
	}
	if e != nil {
		return nil, e
	}
	return resp, nil
}

//gbk->utf8
func G2U(s string) string {
	ret, e := gbktoutf8([]byte(s))
	if e != nil {
		return ""
	}
	return string(ret)
}

//utf8->gbk
func U2G(s string) string {
	ret, e := utf8togbk([]byte(s))
	if e != nil {
		return ""
	}
	return string(ret)
}

func gbktoutf8(s []byte) ([]byte, error) {
	reader := transform.NewReader(bytes.NewReader(s), simplifiedchinese.GBK.NewDecoder())
	d, e := ioutil.ReadAll(reader)
	if e != nil {
		return nil, e
	}
	return d, nil
}
func utf8togbk(s []byte) ([]byte, error) {
	reader := transform.NewReader(bytes.NewReader(s), simplifiedchinese.GBK.NewEncoder())
	d, e := ioutil.ReadAll(reader)
	if e != nil {
		return nil, e
	}
	return d, nil
}

func filterStr(str string) string {
	str = strings.Replace(str, "\r\n", "", -1)
	str = strings.Replace(str, "\r", "", -1)
	str = strings.Replace(str, "\n", "", -1)
	str = strings.Replace(str, "#", "", -1)
	str = strings.TrimSpace(str)
	return str
}

func s(a ...interface{}) {
	fmt.Println(a)
}

//outlog
func outlog(str string) {
	pwd, _ := os.Getwd()
	outlog := fmt.Sprintf("%s/%s_log.txt", pwd, LOG)
	file, err := os.OpenFile(outlog, os.O_APPEND|os.O_CREATE|os.O_WRONLY, 0600)
	defer file.Close()
	if err != nil {
		return
	}
	str += "\n"
	file.WriteString(str)
}
